home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 4 / ETO Development Tools 4.iso / Essentials / MacApp Documentation / MacApp.TECH$ Archives / 1990 / Nov 90 / MacApp.Tech$ 11⁄2⁄90 / 2276-Re GridView Selectio-Oct90 < prev    next >
Encoding:
Text File  |  1991-03-06  |  1.6 KB  |  49 lines  |  [TEXT/GEOL]

  1. Item forwarded  by  STATTENFIELD to D.LAMOUR
  2.  
  3. Item    0728417                         30-Oct-90        12:50PST
  4.  
  5. From:   D2275                           Bear River Assoc, Engineering,PRT
  6.  
  7. To:     MACAPP.TECH$                    MacApp Technical
  8.  
  9. cc:     PHAROS.TECH                     Pharos Tech, Tech Staff,PRT
  10.  
  11. Sub:    RE:GridView Selection Problem
  12.  
  13. From:    Steve Evangelou, Bear River Associates
  14. To:      MACAPP.TECH$
  15. Subject: RE: GridView Selection problem in Calc program
  16. cc:      Scott D.
  17.  
  18. The following versions of TRowSelector.ComputeAnchorCell and
  19. TColumnSelector.ComputeAnchorCell will improve the performance of Calc when
  20. shift-clicking on a row or column button when some cells are already selected.
  21.  
  22. PROCEDURE TRowSelector.ComputeAnchorCell(VAR clickedCell: GridCell); OVERRIDE;
  23.    BEGIN
  24.    INHERITED ComputeAnchorCell(clickedCell);
  25.    fAnchorCell.h := 1;
  26.  
  27.    clickedCell.h := 1; { Don't really need this line anymore. }
  28.    fCellSelector.ComputeAnchorCell(clickedCell);
  29.  { Next two lines are new. }
  30.    fCellSelector.fAnchorCell.h := 1;
  31.    fAnchorCell.v := fCellSelector.fAnchorCell.v;
  32.    END;
  33.  
  34. PROCEDURE TColumnSelector.ComputeAnchorCell(VAR clickedCell: GridCell);
  35. OVERRIDE;
  36.    BEGIN
  37.    INHERITED ComputeAnchorCell(clickedCell);
  38.    fAnchorCell.v := 1;
  39.  
  40.    clickedCell.h := 1; { Don't really need this line anymore. }
  41.  fCellSelector.ComputeAnchorCell(clickedCell);
  42.    fCellSelector.fAnchorCell.v := 1;
  43.    fAnchorCell.h := fCellSelector.fAnchorCell.h;
  44.    END;
  45.  
  46. The resulting behavior is similar to Excel, so I can't claim it's a complete
  47. fix.  However, it's certainly an improvement.
  48.  
  49.